﻿Imports System.Data

Public Class MensajeEspecial
    Public Sub Mostrar(ByVal strMensaje As String, ByVal lstDatos As List(Of CInstrumento))
        Me.lblMensaje.Content = strMensaje

        Me.lsvDatos.ItemsSource = lstDatos

        Me.ShowDialog()
    End Sub

    Private Sub btnSi_Click(sender As System.Object, e As System.Windows.RoutedEventArgs) Handles btnSi.Click
        Me.Close()
    End Sub
End Class
